home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Experimental BBS Explossion 3
/
Experimental BBS Explossion III.iso
/
c
/
pcw.zip
/
WSCDEMO.C
< prev
next >
Wrap
Text File
|
1990-01-30
|
521b
|
23 lines
#include <stdio.h>
#include <pcwproto.h>
int main(void) {
WNDPTR *wnd;
int i,j;
setborder(SINGLEALL);
bordercolor(WHITE,GREEN);
titlecolor(WHITE,RED);
wnd = wexplode(6,20,18,60,WHITE,GREEN);
wtitle(wnd, TOP,LEFT, " Window Scrolling ");
for (i=3;i<8;i++)
wprints(wnd,i,CENTER,BLUE,GREEN," A sample window scrolling ");
do {
rest(9);
wscroll(wnd,1,3);
rest(9);
wscroll(wnd,1,-3);
} while (!kbhit()); keybrd_flush();
}